home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS Toolkit
/
BBS Toolkit.iso
/
gt_power
/
mailbats.zip
/
MAIL-CC!.BAT
next >
Wrap
DOS Batch File
|
1990-12-11
|
1KB
|
41 lines
@Echo off
@TRACE INITIATING CRASH MAIL RUN %1 //%GTPATH%\GTMAIL.LOG >NUL
GTCD >NUL
IF NOT "%1" == "" GOTO PARM_OK
ECHO Node MUST be specified.....e.g. 032001 or 032/001
ECHO Usage is CRASH 032/001
GOTO EXIT
:PARM_OK
ECHO
ECHO
╒═════════════════════════════════════════════════════╕
ECHO
│ ATTEMPTING CRASH CALLS │
ECHO
╘═════════════════════════════════════════════════════╛
@TRACE .....Crashing %1 //%GTPATH%\GTMAIL.LOG >NUL
CONCOPY %GTPATH%\MAIL-PCP.LOG
:AGAIN
ECHO CALLING MDRIV048 PCP /NOW 2459 2459 /Q:%1 /CC /IP /M2400 /B10 /ZE /R:MAIL!PCP.BBS
CONCOPY %GTPATH%\MAIL-%1.LOG MDRIV047 00F2-A07C CC! /NOW 2455 2455 /Q:%1 /CC /IP /M2400 /B10 /ZC
BE ASK "Do you want to crash last system again ? " yn def=n timeout=10
ECHO
IF ERRORLEVEL = 2 GOTO NEXT
GOTO AGAIN
:NEXT
SHIFT
IF NOT "%1" == "" GOTO AGAIN
:CALL BUZY.BAT
:STOP
BE ASK "Do you want distribute mail ? " yn def=y timeout=10
ECHO
IF ERRORLEVEL = 2 GOTO EXIT
CALL MAILDIST.BAT PCP
:STOP
ERROR-0
CLS
BE ASK "Do you want to rebag? " yn def=n timeout=10
ECHO
IF ERRORLEVEL = 2 GOTO EXIT
CALL MAILBAGR.BAT PCP
:EXIT
@TRACE .....crash calls complete %1 //%GTPATH%\GTMAIL.LOG >NUL